home *** CD-ROM | disk | FTP | other *** search
/ Amoszine 8 / Amoszine 8 (Disk 2 of 3).adf / AMON_Extension.lha / amon_extension / examples_asc / Keycode.asc < prev    next >
Text File  |  1995-07-24  |  584b  |  22 lines
  1. ' Program: To show key functions.
  2. '  Author: Paul Overy
  3. '    Date: 24/7/95 
  4. '
  5. Screen Open 0,640,200,2,$8000 : Curs Off 
  6. '
  7. Print "Esc quits"
  8. Print "The Amos key commands will not work"
  9. Print "with multitaking off, Amon however will."
  10. Print Cdown$;"Multitaking is not turned off for this demo."
  11. Repeat 
  12.    '  
  13.    'Amos needs to do this:- 
  14.    A$=Inkey$
  15.    Print At(0,8);"Amos Scancode";Scancode;"  "
  16.    Print "Amos Scancode clears itself after use, and its response is slow"
  17.    '
  18.    'with the Amon extension:- 
  19.    Print At(0,11);"Amon Keycode ";Keycode;"  "
  20.    '    
  21. Until Key Press(69)
  22.